<script>on mousedownset cursor to watchtype tabglobal selectedkey,openfileput the rect of me into therectput the mouseloc into DownLocput ((item 2 of DownLoc - item 2 of therect+ the scroll of me)¬div the textheight of me)+1 into thelineif line theline of me is not empty thenput "1,"& theline &","& line theline of me into SelectedKeyGetscriptif openfile ≠ "" thenset the name of button 1 to "» copy »"set the name of button 2 to "» copy all »"show btn 1show btn 2elsehide btn 1hide btn 2end ifshow btn 3show btn 4select line theline of meend ifend mousedownon mouseupend mouseup</script>
</part>
<part>
<id>5</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>192</left>
<top>99</top>
<right>320</right>
<bottom>121</bottom>
</rect>
<style>roundrect</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>¬´ move ¬´</name>
<script>on mouseUpglobal openfile,selectedkeyif the short name of me is "Can’t copy" then exit mouseupdocopyput "" into cd fld 1put "" into cd fld 2GetInstalledKeysif openfile ≠ "" thenGetKeysFromFileGetFileInfoend ifput "1,1," into selectedkeygetscripthide btn 1hide btn 2hide btn 3hide btn 4end mouseUp</script>
</part>
<part>
<id>6</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>192</left>
<top>124</top>
<right>320</right>
<bottom>146</bottom>
</rect>
<style>roundrect</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>¬´ move all ¬´</name>
<script>on mouseUpglobal selectedkey,openfileif the name of me is "Can’t copy" then exit mouseupput item 1 of selectedkey into TheFieldput cd fld TheField into CopyListrepeat with x =1 to the number of lines in copylistput TheField&","&x&","&line x of Copylist into SelectedKeyGetScriptdocopyend repeatput "" into cd fld 1put "" into cd fld 2GetInstalledKeysif openfile ≠ "" thenGetKeysFromFileGetFileInfoend ifput "1,1," into selectedkeygetscripthide btn 1hide btn 2hide btn 3hide btn 4end mouseUp</script>
</part>
<part>
<id>7</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>192</left>
<top>149</top>
<right>320</right>
<bottom>171</bottom>
</rect>
<style>roundrect</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Remove</name>
<script>on mouseUpglobal Currentscript,SelectedKey,openfileif item 1 of selectedKey = "2" thenanswer "I can only remove keys from a stack." with "OK"exit mouseupend ifanswer "Removing a Key sends it into the void forever ..." with¬"Go Ahead" or "Cancel"if it is "Cancel" then exit mouseupput last word of SelectedKey into KeyNameput first word of item 3 of SelectedKey into Keytypeput length(Keyname)+Length(Keytype) into TheLengthput offset("on Do"&Keytype&keyname&return,currentscript) into startput offset("end Do"&Keytype&keyname&return,currentscript) into finishput "" into char start to finish + 5 + thelength of¬currentscriptUpdateStackScriptput "" into cd fld 1put "" into cd fld 2GetInstalledKeysif openfile ≠ "" then GetKeysFromFileput "1,1," into SelectedKeyhide btn 1hide btn 2hide btn 3hide btn 4GetScriptend mouseup</script>
</part>
<part>
<id>8</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>192</left>
<top>174</top>
<right>320</right>
<bottom>196</bottom>
</rect>
<style>roundrect</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Reassign script ...</name>
<script>on mouseUpglobal selectedkey,keynames,openfile,padding,FkeyNamesif item 1 of selectedkey is "2" and openfile ="" thenanswer "I Can’t reassign an Unused Key"exit mouseupend ifset cursor to busyput "" into cd fld "Choose"set the scroll of cd fld "Choose" to 0put "Reassign "&& last item of selectedkey &&"script to :" into¬cd fld actiondodialog showput cd field (item 1 of selectedkey) into temprepeat with x = 1 to the number of items in Keynamesif item x of keynames = "*" then next repeatput "Control — "&item x of keynames& padding into thenameif thename is not in temp thenput thename after cd fld "Choose"end ifset cursor to busyend repeatrepeat with x = 1 to the number of items in FkeyNamesput "Fkey — "&item x of FkeyNames &padding into thenameif thename is not in Temp thenput thename after cd fld "Choose"end ifset cursor to busyend repeatend mouseUp</script>
</part>
<part>
<id>9</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>46</left>
<top>13</top>
<right>83</right>
<bottom>43</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>29114</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Return to stack</name>
<script>on mouseUptype tabclose window short name of this stackpop cardend mouseUp</script>
</part>
<part>
<id>10</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>334</left>
<top>220</top>
<right>417</right>
<bottom>243</bottom>
</rect>
<style>roundrect</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Open...</name>
<script>on mouseUpglobal openfile,Keynames,selectedkeyif the short name of me is "Open..." thenanswer file "Choose a storage file ..." of type "TEXT"put it into thefileif thefile is not empty thenset the name of me to "Close"put thefile into openfileGetFileInfoset the name of button 1 to "¬´ copy ¬´"set the name of button 2 to "¬´ copy all ¬´"hide btn 3show btn 4put "" into cd fld 2set the scroll of cd fld 2 to 0GetKeysFromFileput "2,1,"& line 1 of cd fld 2 into selectedkeyGetScriptend ifelseset the name of me to "Open..."put "" into openfileput "Unused Keys" into cd fld "filename"put "" into cd fld 1put "" into cd fld 2set the name of button 1 to "¬´ move ¬´"set the name of button 2 to "¬´ move all ¬´"hide btn 3hide btn 4GetInstalledKeysput "2,1,"& line 1 of cd fld 2 into selectedkeyGetScriptend ifend mouseUp</script>
</part>
<part>
<id>12</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>335</left>
<top>88</top>
<right>503</right>
<bottom>216</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name></name>
<script>on mousedownglobal openfileset cursor to watchtype tabglobal selectedkeyput the rect of me into therectput the mouseloc into DownLocput ((item 2 of DownLoc - item 2 of therect+ the scroll of me)¬div the textheight of me)+1 into thelineif line theline of me is not empty thenput "2,"& theline &","& line theline of me into SelectedKeyGetscriptif openfile = "" thenset the name of button 1 to "« move «"set the name of button 2 to "« move all «"hide btn 4elseset the name of button 1 to "« copy «"set the name of button 2 to "« copy all «"show btn 4end ifshow btn 1show btn 2hide btn 3select line theline of meend ifend mousedownon mouseupend mouseup</script>
</part>
<part>
<id>13</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>8</left>
<top>54</top>
<right>176</right>
<bottom>87</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>StackName</name>
<script></script>
</part>
<part>
<id>15</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>335</left>
<top>54</top>
<right>503</right>
<bottom>87</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>filename</name>
<script></script>
</part>
<part>
<id>18</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>467</left>
<top>11</top>
<right>499</right>
<bottom>46</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>2507</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Help</name>
<script>on mouseUpset the visible of card field "help" to not the visible of cd fld "help"end mouseUp</script>
</part>
<part>
<id>19</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>12</left>
<top>13</top>
<right>46</right>
<bottom>41</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>20098</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Home</name>
<script>on mouseUptype tabclose window short name of this stackgo homeend mouseUp</script>
</part>
<part>
<id>23</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>435</left>
<top>11</top>
<right>468</right>
<bottom>48</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>2478</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>About</name>
<script>on mouseUpset hilite of me to trueset the textsize of cd fld About to 1show cd fld Aboutrepeat with x =1 to 10set the textsize of cd fld About to xend repeatrepeat until the mouse is downend repeatrepeat with x = 13 to 110if x mod 12 ≠ 1 then next repeatset the textheight of cd fld About to xend repeatwait 100hide cd fld aboutset the textheight of cd fld about to 13set hilite of me to falseend mouseUp</script>
</part>
<part>
<id>24</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>8</left>
<top>220</top>
<right>91</right>
<bottom>243</bottom>
</rect>
<style>roundrect</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Open...</name>
<script>on mouseUpglobal StackOpen,selectedkey,OpenFileanswer file "Choose a hypercard stack ..." of type "STAK"if it = "" then exit mouseupput it into StackOpenGetStackInfoput "" into cd fld 1if openfile = "" then put "" into cd fld 2GetInstalledKeysput "1,1,"& line 1 of cd fld 1 into selectedkeyGetScriptend mouseUp</script>
</part>
<part>
<id>38</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>202</left>
<top>49</top>
<right>315</right>
<bottom>71</bottom>
</rect>
<style>checkbox</style>
<showName> <true /> </showName>
<highlight> <true /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Control Driver</name>
<script>on mouseUpglobal openfileif the hilite of me is true thenremoveDriver ControlKeyelse InstallDriver ControlKeyset the hilite of me to installed(ControlKey)if installed(ControlKey) thenenable menuItem 4 of menu "Hyperkeys"disable menuItem 3 of menu "Hyperkeys"elseenable menuItem 3 of menu "Hyperkeys"disable menuItem 4 of menu "Hyperkeys"end ifif word 2 of cd fld stackname = quote &"home""e thengetstackinfoput "" into cd fld 1if openfile = "" then put "" into cd fld 2getinstalledkeysend ifend mouseUp</script>
</part>
<part>
<id>25</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>94</left>
<top>220</top>
<right>177</right>
<bottom>243</bottom>
</rect>
<style>roundrect</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Compact</name>
<script>on mouseUpglobal StackOPenpush cardput "Compacting"&& line 1 of cd fld "StackName"set cursor to watchset lockmessages to trueset lockscreen to truego stack StackopenDoMenu "Compact Stack"pop cardgetStackInfohide msgend mouseUp</script>
</part>
<part>
<id>26</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>420</left>
<top>220</top>
<right>503</right>
<bottom>243</bottom>
</rect>
<style>roundrect</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>New...</name>
<script>on mouseUpglobal openfilerepeat foreverask "Create text file named:" with ""if it is empty then exit repeatput it into thefileopen file thefileread from file thefile for 16384close file thefileif it ≠ empty thenplay boinganswer thefile&&"already exists, replace it?"¬with "Yes" or "No"if it is "Yes" then put empty into itend ifif it is empty thenput thefile into openfileopen file thefilewrite return to file thefileclose file thefilegetfileinfoput "" into cd fld 2getkeysfromfileset the name of button 6 to "Close"hide btn 3show btn 4exit repeatend ifend repeatend mouseUp</script>
</part>
<part>
<id>37</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>202</left>
<top>70</top>
<right>306</right>
<bottom>92</bottom>
</rect>
<style>checkbox</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>FKeys Driver</name>
<script>on mouseUpif the hilite of me is true then removeDriver FKeyelse InstallDriver FKeyset the hilite of me to installed(FunctionKey)if installed(FunctionKey) thenenable menuItem 7 of menu "Hyperkeys"disable menuItem 6 of menu "Hyperkeys"elseenable menuItem 6 of menu "Hyperkeys"disable menuItem 7 of menu "Hyperkeys"end ifend mouseUp</script>
</part>
<part>
<id>20</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>8</left>
<top>49</top>
<right>504</right>
<bottom>313</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>Help</name>
<script>on mouseuphide meend mouseup</script>
</part>
<part>
<id>29</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>0</left>
<top>65522</top>
<right>512</right>
<bottom>328</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Cover</name>
<script>on mouseUpplay boingend mouseUp</script>
</part>
<part>
<id>17</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>8</left>
<top>49</top>
<right>504</right>
<bottom>313</bottom>
</rect>
<style>opaque</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>10</textSize>
<textStyle>plain</textStyle>
<textHeight>13</textHeight>
<name>About</name>
<script>on mouseuphide meend mouseup</script>
</part>
<part>
<id>30</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>89</left>
<top>96</top>
<right>428</right>
<bottom>227</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>Dlog</name>
<script>on mouseupend mouseup</script>
</part>
<part>
<id>42</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>92</left>
<top>99</top>
<right>425</right>
<bottom>224</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>dlog3</name>
<script></script>
</part>
<part>
<id>31</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>93</left>
<top>100</top>
<right>424</right>
<bottom>223</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>14</textHeight>
<name>Dlog2</name>
<script>on mouseupend mouseup</script>
</part>
<part>
<id>32</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>168</left>
<top>198</top>
<right>249</right>
<bottom>219</bottom>
</rect>
<style>roundrect</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>OK</name>
<script>on mouseUpglobal currentscript,openfile,selectedkey,openstackset cursor to watchput word 1 of the selection into NewTypeput last word of the selection into NewNameput last word of SelectedKey into KeyNameput first word of item 3 of SelectedKey into KeyTypeput length(Keyname) + Length(Keytype) into TheLengthdodialog hideif item 1 of selectedkey = "2" thenopen file openfileread from file openfile for 16384put it into tempclose file openfileelseput currentscript into tempend ifput offset ("On Do"&keytype&Keyname&return,temp) into startput offset ("End Do"&keytype&Keyname&return,temp) into finishif start = finish thenanswer "Can’t seem to find "&keytype&&"-"&&keynameexit mouseupend ifput "End Do"&newtype&newName&return into char finish to¬finish+thelength+7 of tempput "On Do"&Newtype&newName&return into char start to start+thelength¬+6 of tempif item 1 of selectedkey = "2" thenput "Writing to "&line 1 of cd fld "Filename"&" ..."open file openfilewrite temp to file openfileclose file openfilehide msgelseput temp into currentscriptUpdateStackScriptend ifput NewType into word 1 of item 3 of selectedkeyput NewName into last word of selectedkeyput "" into cd fld 1put "" into cd fld 2GetInstalledKeysif openfile ≠ "" then GetKeysFromFileGetScriptend mouseUp</script>
<script>on mousedownput the rect of me into therectput the mouseloc into DownLocput ((item 2 of DownLoc - item 2 of therect+ the scroll of me)¬div 16)+1 into thelineif line theline of me is not empty then select line theline of meend mousedownon mouseupend mouseup</script>
<text><span class="style3">elp with Hyperkeys:</span><span class="style1"> HyperKeys is a Hypercard programming utility which will assign any script to be executed when Control and another key are pressed or, on the Apple Extended Keyboard, when a functionkey is pressed.</span><span class="style4">To Install/Remove Hyperkeys:</span><span class="style1"> For the keys to work, you must install the respective driver. This is done by clicking on the checkboxes “ControlKey Driver” and “Functionkey driver”. These boxes are checked when the driver is installed, blank when not. NB. Removing the driver does not remove the KeyScripts associated with a stack. Removing the driver is thus a good way of temporarily disabling HyperKeys. On installation, Control-H is assigned to bring you to this stack.</span><span class="style4">Adding New Keys:</span><span class="style1"> Click on the key you wish to add from the Unused Keys list. Either give it a script and immediately copy it across to the Home stack using the« move « button, or move it first and then assign it a script.</span><span class="style4">Adding Keys from a text file:</span><span class="style1"> With Hyperkeys 2.1 comes a whole selection of key scripts stored in a text file called Key Storage. To copy these keys to the home stack first open a file using the Open... button, then copy the keys you want with the copy button.</span><span class="style4">Removing Keys:</span><span class="style1"> Keys can only be removed from a stack. This is done by selecting the key you wish to remove and then clicking on Remove. Once removed, a script is lost forever: be careful!</span><span class="style4">Saving Keys to a text file:</span><span class="style1"> Open a text file using the "Open..." button, or create a new file using the "New..." button. Now select the keys from the stack and press "» copy »" to save that key. To copy all the keys, select any key in the stack and press "» copy all »".</span><span class="style3">Tips for Key Scripts:</span><span class="style1"> Keys can be installed in any stack as well as the Home stack; installing them in the home stack means they will be universally available, whilst installing them in a specific stack will mean the keys are available ONLY in that stack, and will OVERRIDE keys of the same name in the Home stack. Similarly, if a stack is ‘in use’ its key scripts may override those placed in the home stack. Be careful Using stacks when they contain keyscripts. Try to make the scripts as universal as possible so they work in any circumstance, and protect destructive keys with an Answer Dialog box asking for confirmation - it is all too easy to hit Control instead of Shift ! Also, remember that not everyone has an Extended keyboard, or even one with a Control key on it (the Mac Plus for example), so if a function key script is essential to a stack, provide an alternative method as well! You can make one key do several things by testing for the shift, command and option keys at the beginning of the script. You can call other handlers from a Keyscript, but don't put in an “On handler ”, “End Handler” ... these are put in for you. Due to the way controlkeys are mapped you will find that Control and some keys will invoke other scripts as below :</span><span class="style5">Control and key</span><span class="style1"> </span><span class="style5">Is the same as</span><span class="style1"></span><span class="style2">HOME Control - AENTER   Control - CEND Control - DHELP Control - EDELETE Control - HTAB Control - IPAGE UP Control - KPAGE DOWN Control - LRETURN Control - MANY FUNCTION KEY Control - PESC Control - OPEN (Bracket)CLEAR Control - OPEN (Bracket)LEFT ARROW Control - BSLASHRIGHT ARROW Control - CLOSE (Bracket)DOWN ARROW Control - MINUS</span><span class="style1"> Note CONTROL - MINUS differs from CONTROL - KPADMINUS, the former being the minus key on the main keyboard, the latter being the minus key on the Numeric KeyPad. Also note that Control with any functionkey does NOT execute that function, but executes Control - P.</span><span class="style3">Enjoy!</span></text>
<text>Control — E Control — I Control — J Control — K Control — N Control — O Control — P Control — Q Control — S Control — X Control — Y Control — Z Control — Uparrow Control — Minus Control — Quote Control — Times Control — Plus Control — Comma Control — KpadMinus Control — Period Control — Zero Control — Five Control — Six Control — Seven Control — Eight Control — Nine Control — SemiColon Control — Equals Control — Apostrophe Fkey — One Fkey — Two Fkey — Three Fkey — Four Fkey — Five Fkey — Six Fkey — Seven Fkey — Eight Fkey — Nine Fkey — Ten Fkey — Eleven Fkey — Twelve Fkey — Thirteen Fkey — Fourteen Fkey — Fifteen </text>
</content>
<content>
<layer>background</layer>
<id>4</id>
<text>Script of Control-I</text>
</content>
<content>
<layer>card</layer>
<id>1</id>
<text>Control — A Control — B Control — C Control — D Control — E Control — F Control — G Control — H Control — L Control — M Control — Q Control — R Control — S Control — T Control — U Control — V Control — W Control — Backslash Control — Close Control — Uparrow Control — Minus Control — Space Control — Slash Control — One Control — Two Control — Three Control — Four </text>
</content>
<content>
<layer>card</layer>
<id>12</id>
<text>Control — I Control — J Control — K Control — N Control — O Control — P Control — X Control — Y Control — Z Control — Open Control — Quote Control — Times Control — Plus Control — Comma Control — KpadMinus Control — Period Control — Zero Control — Five Control — Six Control — Seven Control — Eight Control — Nine Control — SemiColon Control — Equals Control — Apostrophe Fkey — One Fkey — Two Fkey — Three Fkey — Four Fkey — Five Fkey — Six Fkey — Seven Fkey — Eight Fkey — Nine Fkey — Ten Fkey — Eleven Fkey — Twelve Fkey — Thirteen Fkey — Fourteen Fkey — Fifteen </text>
</content>
<name>Hyperkeys</name>
<script>on idleglobal selectedkeyif visible of cd fld 10 is true then pass idleif "bkgnd" is not in the selectedfield and¬the selectedfield ≠ "Message box" and item 3 of selectedkey ≠ "" thenselect line (item 2 of selectedkey) of card field item 1 of selectedkeyend ifif item 3 of selectedkey = "" and ¬"bkgnd" is not in the selectedfield and¬the selectedfield ≠ "message box" then select before char 1 of fld 2pass idleend idle</script>
(1994).iso/pc/utilitie/system_7/hyperkey/hyperkey.1/BMAP_3243.png){kind=link}
(1994).iso/pc/utilitie/system_7/hyperkey/hyperkey.1/PATs.png){kind=link}